home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 6 (Reseller Edition) / Apple Ref. & Pres. Lib.v6.0.toast / pc / 3-Presentations / Apple Demos / CPUs / Macintosh Solutions Demo / Macintosh Solutions 1.0 / card_13688.txt < prev    next >
Text File  |  1990-08-24  |  8KB  |  335 lines
  1. -- card: 13688 from stack: in.0
  2. -- bmap block id: 12939
  3. -- flags: 4000
  4. -- background id: 4734
  5. -- name: USAC1.2
  6.  
  7.  
  8. -- part 4 (button)
  9. -- low flags: 00
  10. -- high flags: A003
  11. -- rect: left=325 top=93 right=115 bottom=489
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Which Macintosh?…
  20. ----- HyperTalk script -----
  21.  
  22. on mouseUp -- College Student Solution
  23.   determineSoftware -- bg script
  24.   put char 4 of short name of this card into whichCategory
  25.   repeat with i = 10 to 15
  26.     set cursor to busy
  27.     if the hilight of cd btn i = true then
  28.       goSolution whichCategory,2.2
  29.       exit mouseUp
  30.     end if
  31.   end repeat
  32.   repeat with i = 2 to 9
  33.     set cursor to busy
  34.     if the hilight of cd btn i = true then
  35.       goSolution whichCategory,2.1
  36.       exit mouseUp
  37.     end if
  38.   end repeat
  39.   answer "Please select at least one software category."
  40. end mouseUp
  41.  
  42.  
  43.  
  44.  
  45. -- part 5 (button)
  46. -- low flags: 00
  47. -- high flags: A005
  48. -- rect: left=79 top=224 right=245 bottom=244
  49. -- title width / last selected line: 0
  50. -- icon id / first selected line: 0 / 0
  51. -- text alignment: 1
  52. -- font id: 0
  53. -- text size: 12
  54. -- style flags: 0
  55. -- line height: 16
  56. -- part name: Document Processing
  57. ----- HyperTalk script -----
  58. on mouseUp
  59.   if the hilight of me is true then putMeInList (short name of me)
  60.   else getMeOutOfList (short name of me)
  61. end mouseUp
  62.  
  63.  
  64.  
  65. -- part 6 (button)
  66. -- low flags: 00
  67. -- high flags: A005
  68. -- rect: left=289 top=204 right=225 bottom=423
  69. -- title width / last selected line: 0
  70. -- icon id / first selected line: 0 / 0
  71. -- text alignment: 1
  72. -- font id: 0
  73. -- text size: 12
  74. -- style flags: 0
  75. -- line height: 16
  76. -- part name: Spreadsheets
  77. ----- HyperTalk script -----
  78. on mouseUp
  79.   if the hilight of me is true then putMeInList (short name of me)
  80.   else getMeOutOfList (short name of me)
  81. end mouseUp
  82.  
  83.  
  84.  
  85. -- part 7 (button)
  86. -- low flags: 00
  87. -- high flags: A005
  88. -- rect: left=79 top=184 right=205 bottom=213
  89. -- title width / last selected line: 0
  90. -- icon id / first selected line: 0 / 0
  91. -- text alignment: 1
  92. -- font id: 0
  93. -- text size: 12
  94. -- style flags: 0
  95. -- line height: 16
  96. -- part name: Database
  97. ----- HyperTalk script -----
  98. on mouseUp
  99.   if the hilight of me is true then putMeInList (short name of me)
  100.   else getMeOutOfList (short name of me)
  101. end mouseUp
  102.  
  103.  
  104.  
  105. -- part 8 (button)
  106. -- low flags: 00
  107. -- high flags: A005
  108. -- rect: left=79 top=244 right=265 bottom=213
  109. -- title width / last selected line: 0
  110. -- icon id / first selected line: 0 / 0
  111. -- text alignment: 1
  112. -- font id: 0
  113. -- text size: 12
  114. -- style flags: 0
  115. -- line height: 16
  116. -- part name: E-Mail
  117. ----- HyperTalk script -----
  118. on mouseUp
  119.   if the hilight of me is true then putMeInList (short name of me)
  120.   else getMeOutOfList (short name of me)
  121. end mouseUp
  122.  
  123.  
  124.  
  125. -- part 10 (button)
  126. -- low flags: 00
  127. -- high flags: A005
  128. -- rect: left=79 top=264 right=285 bottom=218
  129. -- title width / last selected line: 0
  130. -- icon id / first selected line: 0 / 0
  131. -- text alignment: 1
  132. -- font id: 0
  133. -- text size: 12
  134. -- style flags: 0
  135. -- line height: 16
  136. -- part name: Library Access
  137. ----- HyperTalk script -----
  138. on mouseUp
  139.   if the hilight of me is true then putMeInList (short name of me)
  140.   else getMeOutOfList (short name of me)
  141. end mouseUp
  142.  
  143.  
  144.  
  145. -- part 11 (button)
  146. -- low flags: 00
  147. -- high flags: A005
  148. -- rect: left=289 top=144 right=165 bottom=413
  149. -- title width / last selected line: 0
  150. -- icon id / first selected line: 0 / 0
  151. -- text alignment: 1
  152. -- font id: 0
  153. -- text size: 12
  154. -- style flags: 0
  155. -- line height: 16
  156. -- part name: Presentations
  157. ----- HyperTalk script -----
  158. on mouseUp
  159.   if the hilight of me is true then putMeInList (short name of me)
  160.   else getMeOutOfList (short name of me)
  161. end mouseUp
  162.  
  163.  
  164.  
  165. -- part 12 (button)
  166. -- low flags: 00
  167. -- high flags: A005
  168. -- rect: left=79 top=204 right=225 bottom=218
  169. -- title width / last selected line: 0
  170. -- icon id / first selected line: 0 / 0
  171. -- text alignment: 1
  172. -- font id: 0
  173. -- text size: 12
  174. -- style flags: 0
  175. -- line height: 16
  176. -- part name: Discipline Specific Software
  177. ----- HyperTalk script -----
  178. on mouseUp
  179.   if the hilight of me is true then putMeInList (short name of me)
  180.   else getMeOutOfList (short name of me)
  181. end mouseUp
  182.  
  183.  
  184.  
  185. -- part 13 (button)
  186. -- low flags: 00
  187. -- high flags: A005
  188. -- rect: left=79 top=164 right=185 bottom=230
  189. -- title width / last selected line: 0
  190. -- icon id / first selected line: 0 / 0
  191. -- text alignment: 1
  192. -- font id: 0
  193. -- text size: 12
  194. -- style flags: 0
  195. -- line height: 16
  196. -- part name: Bibliographic Tools
  197. ----- HyperTalk script -----
  198. on mouseUp
  199.   if the hilight of me is true then putMeInList (short name of me)
  200.   else getMeOutOfList (short name of me)
  201. end mouseUp
  202.  
  203.  
  204.  
  205. -- part 14 (button)
  206. -- low flags: 00
  207. -- high flags: A005
  208. -- rect: left=79 top=284 right=305 bottom=306
  209. -- title width / last selected line: 0
  210. -- icon id / first selected line: 0 / 0
  211. -- text alignment: 1
  212. -- font id: 0
  213. -- text size: 12
  214. -- style flags: 0
  215. -- line height: 16
  216. -- part name: Modeling and Simulation Tools
  217. ----- HyperTalk script -----
  218. on mouseUp
  219.   if the hilight of me is true then putMeInList (short name of me)
  220.   else getMeOutOfList (short name of me)
  221. end mouseUp
  222.  
  223.  
  224.  
  225. -- part 15 (button)
  226. -- low flags: 00
  227. -- high flags: A005
  228. -- rect: left=289 top=164 right=185 bottom=466
  229. -- title width / last selected line: 0
  230. -- icon id / first selected line: 0 / 0
  231. -- text alignment: 1
  232. -- font id: 0
  233. -- text size: 12
  234. -- style flags: 0
  235. -- line height: 16
  236. -- part name: Publishing
  237. ----- HyperTalk script -----
  238. on mouseUp
  239.   if the hilight of me is true then putMeInList (short name of me)
  240.   else getMeOutOfList (short name of me)
  241. end mouseUp
  242.  
  243.  
  244.  
  245. -- part 16 (button)
  246. -- low flags: 00
  247. -- high flags: A005
  248. -- rect: left=289 top=184 right=205 bottom=460
  249. -- title width / last selected line: 0
  250. -- icon id / first selected line: 0 / 0
  251. -- text alignment: 1
  252. -- font id: 0
  253. -- text size: 12
  254. -- style flags: 0
  255. -- line height: 16
  256. -- part name: Software Engineering
  257. ----- HyperTalk script -----
  258. on mouseUp
  259.   if the hilight of me is true then putMeInList (short name of me)
  260.   else getMeOutOfList (short name of me)
  261. end mouseUp
  262.  
  263.  
  264.  
  265. -- part 17 (button)
  266. -- low flags: 00
  267. -- high flags: A005
  268. -- rect: left=79 top=144 right=165 bottom=255
  269. -- title width / last selected line: 0
  270. -- icon id / first selected line: 0 / 0
  271. -- text alignment: 1
  272. -- font id: 0
  273. -- text size: 12
  274. -- style flags: 0
  275. -- line height: 16
  276. -- part name: Authoring Tools
  277. ----- HyperTalk script -----
  278. on mouseUp
  279.   if the hilight of me is true then putMeInList (short name of me)
  280.   else getMeOutOfList (short name of me)
  281. end mouseUp
  282.  
  283.  
  284.  
  285. -- part 18 (button)
  286. -- low flags: 00
  287. -- high flags: A005
  288. -- rect: left=289 top=224 right=245 bottom=455
  289. -- title width / last selected line: 0
  290. -- icon id / first selected line: 0 / 0
  291. -- text alignment: 1
  292. -- font id: 0
  293. -- text size: 12
  294. -- style flags: 0
  295. -- line height: 16
  296. -- part name: Statistics and Math
  297. ----- HyperTalk script -----
  298. on mouseUp
  299.   if the hilight of me is true then putMeInList (short name of me)
  300.   else getMeOutOfList (short name of me)
  301. end mouseUp
  302.  
  303.  
  304.  
  305. -- part 19 (button)
  306. -- low flags: 00
  307. -- high flags: A005
  308. -- rect: left=289 top=244 right=265 bottom=428
  309. -- title width / last selected line: 0
  310. -- icon id / first selected line: 0 / 0
  311. -- text alignment: 1
  312. -- font id: 0
  313. -- text size: 12
  314. -- style flags: 0
  315. -- line height: 16
  316. -- part name: Unix
  317. ----- HyperTalk script -----
  318. on mouseUp
  319.   if the hilight of me is true then putMeInList (short name of me)
  320.   else getMeOutOfList (short name of me)
  321. end mouseUp
  322.  
  323.  
  324.  
  325. -- part contents for background part 1
  326. ----- text -----
  327. USAC1.2
  328.  
  329. -- part contents for background part 3
  330. ----- text -----
  331. 39
  332.  
  333. -- part contents for background part 7
  334. ----- text -----
  335. Click to select the software categories that interest you, then click the ‚ÄúWhich Macintosh?‚Ķ‚Äù button to see the recommended Macintosh.